// Room: /d/mingjiao/nushe.c
// Date: Java 97/05/11

#include <room.h>
inherit ROOM;

string look_dui();

void create()
{
	set("short", "地门女舍");
	set("long", @LONG
走进这间女舍，一阵脂粉淡香扑面，似有似无，似茉莉，似丁香，
似玫瑰，似夜来香，让人心神荡漾。几位姑娘斜倚阑窗，吟诗作画，全
不似武林中人，谁能想到，她们都是叱咤江湖的巾帼女杰呢？
LONG );
	set("exits", ([
		"out" : __DIR__"mjdimen1",
	]));
	set("item_desc",(["dui lian" : (: look_dui :),]));
	set("sleep_room", 1);
	set("no_fight", 1);
	set("no_clean_up", 0);
	set("coor/x", -50880);
	set("coor/y", 710);
	set("coor/z", 0);
	setup();
//	replace_program(ROOM);
}

void init()
{
	object me;
	me=this_player();
	if (me->query("gender")!="女性")
	{
		message_vision("$N只觉暗香扑面，眼前一阵晕眩，恍惚间一女子云袖轻舒，你就...\n",me);
		me->move("/d/mingjiao/hsqtan2.c");
	}
}

string look_dui()
{
	return
	"\n"
	"    ****************************************\n"
	"    **************　　　　　　**************\n"
	"    **************　山　　水　**************\n"
	"    **************　　　　　　**************\n"
	"    **************  色    光　**************\n"
	"    **************　　　　　　**************\n"
	"    **************  空    敛　**************\n"
	"    **************　　　　　　**************\n"
	"    **************  蒙    滟　**************\n"
	"    **************　　　　　　**************\n"
	"    **************　雨　  晴  **************\n"
	"    **************　          **************\n"
	"    **************　亦    方  **************\n"
	"    **************            **************\n"
	"    **************  奇 　 好　**************\n"
	"    **************            **************\n"
	"    ****************************************\n";
}
